home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 3dcd / Animraw.dir / 00002.ls < prev    next >
Encoding:
Text File  |  1999-04-28  |  3.6 KB  |  110 lines
  1. on initmovies
  2.   global currentmovie, currentframe
  3.   currentmovie = "ShrineIntro"
  4. end
  5.  
  6. on incrementMovie
  7.   global zeoIdle, currentmovie, currentframe, gEngButtonSprite, gInterview
  8.   gInterview = 0
  9.   TempCurrentMovie = currentmovie
  10.   if TempCurrentMovie = "ShrineIntro" then
  11.     currentmovie = "ShrineWater"
  12.     currentframe = marker("Shr3")
  13.   else
  14.     if TempCurrentMovie = "ShrineWater" then
  15.       currentmovie = "InnerTorii"
  16.       currentframe = marker("Shr3a")
  17.     else
  18.       if TempCurrentMovie = "InnerTorii" then
  19.         currentmovie = "WishingStand"
  20.         currentframe = marker("Shr4")
  21.       else
  22.         if TempCurrentMovie = "WishingStand" then
  23.           currentmovie = "BambooCeremony"
  24.           currentframe = marker("Shr5")
  25.         else
  26.           if TempCurrentMovie = "BambooCeremony" then
  27.             currentmovie = "MainShrine"
  28.             currentframe = marker("Shr6")
  29.           else
  30.             if TempCurrentMovie = "MainShrine" then
  31.               currentmovie = "JuniorShrine"
  32.               currentframe = marker("Shr7")
  33.             else
  34.               if TempCurrentMovie = "JuniorShrine" then
  35.                 currentmovie = "ShrineIntro"
  36.                 currentframe = marker("Shr1")
  37.               end if
  38.             end if
  39.           end if
  40.         end if
  41.       end if
  42.     end if
  43.   end if
  44.   if gInterview then
  45.     sprite(gEngButtonSprite).visible = 1
  46.   else
  47.     sprite(gEngButtonSprite).visible = 0
  48.   end if
  49.   set the castNum of sprite gEngButtonSprite to the number of member "shrEngOffUp"
  50.   setBackground()
  51.   startmovieqt(currentmovie)
  52.   if not zeoIdle then
  53.     tback = zeotrope("playMovie", "Bijou")
  54.   end if
  55. end
  56.  
  57. on setBackground
  58.   global currentmovie, currentframe
  59.   if currentmovie = "ShrineIntro" then
  60.     set the castNum of sprite 1 to the number of member "Shr-1f"
  61.     currentframe = marker("Shr1")
  62.   else
  63.     if currentmovie = "ShrineWater" then
  64.       set the castNum of sprite 1 to the number of member "Shr-3f"
  65.       currentframe = marker("Shr3")
  66.     else
  67.       if currentmovie = "InnerTorii" then
  68.         set the castNum of sprite 1 to the number of member "Shr-3af"
  69.         currentframe = marker("Shr3a")
  70.       else
  71.         if currentmovie = "WishingStand" then
  72.           set the castNum of sprite 1 to the number of member "Shr-4f"
  73.           currentframe = marker("Shr4")
  74.         else
  75.           if currentmovie = "BambooPriest" then
  76.             set the castNum of sprite 1 to the number of member "Shr-5f"
  77.             currentframe = marker("Shr5")
  78.           else
  79.             if currentmovie = "BambooCeremony" then
  80.               set the castNum of sprite 1 to the number of member "Shr-5f"
  81.               currentframe = marker("Shr5")
  82.             else
  83.               if currentmovie = "MainShrine" then
  84.                 set the castNum of sprite 1 to the number of member "Shr-6f"
  85.                 currentframe = marker("Shr6")
  86.               else
  87.                 if currentmovie = "MainShrineP" then
  88.                   set the castNum of sprite 1 to the number of member "Shr-6f"
  89.                   currentframe = marker("Shr6")
  90.                 else
  91.                   if currentmovie = "JuniorShrine" then
  92.                     set the castNum of sprite 1 to the number of member "Shr-7f"
  93.                     currentframe = marker("Shr7")
  94.                   else
  95.                     if currentmovie = "JuniorShrineP" then
  96.                       set the castNum of sprite 1 to the number of member "Shr-7f"
  97.                       currentframe = marker("Shr7")
  98.                     end if
  99.                   end if
  100.                 end if
  101.               end if
  102.             end if
  103.           end if
  104.         end if
  105.       end if
  106.     end if
  107.   end if
  108.   updateStage()
  109. end
  110.